home *** CD-ROM | disk | FTP | other *** search
/ Rockford Magazine / Rockford_Magazine_024_19xx_-_de_Disk_1_of_2_Side_A.d64 / synthesizer 64 (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  575b  |  18 lines
  1. 1 poke53280,5:poke53281,5
  2. 2 print"[147]     s y n t h e s i z e r   6 4       "
  3. 3 print"dies ist ein ladeprogramm!":print"bitte nicht unterbrechen!"
  4. 4 print"ladezeit  ca. 1.20  min."
  5. 5 print"z u m   l a d e n  d r u e c k e  'l'"
  6. 6 printtab(20)"programmautor:"
  7. 7 print""tab(20)"werner kracht":print
  8. 8 print
  9. 9 gete$:ife$<>"l"then9
  10. 10 print"[147]l[207]"chr$(34)"seq-c000"chr$(34)",8,1"
  11. 15 print"new"
  12. 20 print"l[207]"chr$(34)"seq-9800"chr$(34)",8,1"
  13. 25 print"p[207]43,229:p[207]44,7:p[207]2020,0:new"
  14. 30 print"l[207]"chr$(34)"seq-basic"chr$(34)",8,1";
  15. 39 print:print"p[207]43,3:p[207]44,12:run:[145][145][145][145][145][145]"
  16. 40 poke198,10:poke631,19
  17. 50 fori=632to640:pokei,13:next:stop
  18.